home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Pro One: Marriage & Divorce Law
/
ProOne: Marriage & Divorce Law.iso
/
lawlib
/
pllcd432.exe
/
0
/
RCDATA
/
TDISCLAIMFORM
/
TDISCLAIMFORM.txt
< prev
Wrap
Text File
|
1997-03-01
|
11KB
|
365 lines
object DisclaimForm: TDisclaimForm
Left = 281
Top = 114
ActiveControl = OvcFirstName
BorderIcons = []
BorderStyle = bsDialog
Caption = 'Personal Law Library, Disclaimer'
ClientHeight = 449
ClientWidth = 632
Color = clSilver
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Arial'
Font.Style = []
PixelsPerInch = 120
Position = poScreenCenter
Scaled = False
ShowHint = True
OnCreate = FormOnCreate
OnDestroy = FormOnDestroy
OnHide = FormOnHide
OnShow = FormOnShow
TextHeight = 17
object BtnAccept: TBitBtn
Left = 120
Top = 416
Width = 120
Height = 30
Hint = 'Click here to accept these terms'
Caption = '&Accept'
Default = True
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = AcceptOnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333833333
33333333333333333333333330833333333333333F333333333333330A083333
33333333F8F3333333333333AA0883333333333388F3333333333330AAA08333
3333333F888F33333333330AAAA08833333333F8888F33333333330AAAAA0833
333333F88888F333333330AAFFAA088333333F880088F3333333FAFF33AAA083
3333080033888F333333FF3333FAA0883333003333088F3333333333333FAA08
83333333333088F3333333333333FAA0883333333333088F3333333333333FAA
0883333333333088F3333333333333FAA0883333333333088F3333333333333F
AA0833333333333088F33333333333333FF33333333333333003}
NumGlyphs = 2
end
object BtnCancel: TBitBtn
Left = 256
Top = 416
Width = 120
Height = 30
Hint = 'Click here if you do NOT accept the terms'
Caption = '&Not Accept'
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = NotAcceptOnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666666666666886666666886666666666666666666610886666610
8866661966666661966669108866611106666011966666111966691108861111
6666660119666111166666911088111666666601196611116666669111011166
6666666011911116666666691111186666666666011111666666666691110886
6666666660111966666666669111108666666666601119666666666691111088
6666666601111196666666661109110886666666011601196666666611669110
8866666611666011966666611666691108666666116666011966669166666691
1666666116666660196666966666666966666600666666660666}
NumGlyphs = 2
end
object Panel1: TPanel
Left = 6
Top = 6
Width = 621
Height = 405
BevelInner = bvRaised
Color = clSilver
TabOrder = 0
object Label10: TLabel
Left = 80
Top = 321
Width = 52
Height = 18
Hint = 'Your First Name'
Alignment = taRightJustify
Caption = 'First:'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 80
Top = 350
Width = 52
Height = 18
Hint = 'Your Middle Name'
Alignment = taRightJustify
Caption = 'Middle:'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 80
Top = 379
Width = 52
Height = 18
Hint = 'Your Last Name'
Alignment = taRightJustify
Caption = 'Last:'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 433
Top = 328
Width = 94
Height = 18
Hint = 'Date you were born, as MM/DD/YYYY'
Caption = 'Date of Birth:'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Panel2: TPanel
Left = 12
Top = 12
Width = 597
Height = 295
BevelInner = bvLowered
BevelOuter = bvLowered
Color = clSilver
TabOrder = 4
object Label9: TLabel
Left = 10
Top = 270
Width = 341
Height = 16
Caption = 'To begin the program, type your full name and date of birth.'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 10
Top = 230
Width = 565
Height = 32
Caption =
'Your use of this program constitutes your acceptance of the term' +
's of this limitation of liability and represents your acknowledg' +
'ment that you have read and understood the above.'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label7: TLabel
Left = 10
Top = 206
Width = 567
Height = 16
Caption =
'In no event shall the liability of the publishers or authors exc' +
'eed the purchase price of this product.'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label6: TLabel
Left = 10
Top = 184
Width = 244
Height = 16
Caption = 'program or the materials contained herein.'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label5: TLabel
Left = 10
Top = 151
Width = 578
Height = 32
Caption =
'this program does not render legal advice and your agreement tha' +
't the publishers and authors of this program bear no responsibil' +
'ity for any unsatisfactory outcome that may result from the use ' +
'of this'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label4: TLabel
Left = 10
Top = 118
Width = 577
Height = 32
Caption =
'This program does not contain or give legal advice and does not ' +
'guarantee the outcome of any legal proceeding. Your use of this' +
' program constitutes your acknowledgement that you understand th' +
'at'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label3: TLabel
Left = 10
Top = 95
Width = 348
Height = 16
Caption = 'application of any of the materials contained in this program.'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label2: TLabel
Left = 10
Top = 62
Width = 566
Height = 32
Caption =
'The authors and publishers of this program specifically disclaim' +
' any liability, loss, or risk which is incurred by you or any ot' +
'her user as a consequence, either direct or indirect, of the use' +
' and/or'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label1: TLabel
Left = 10
Top = 6
Width = 572
Height = 48
Caption =
'This is a self-help legal computer program intended to be used o' +
'nly by the consumer. The use of this program by or for anyone o' +
'ther than the consumer may constitute the unauthorized practice ' +
'of law.'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
WordWrap = True
end
end
object OvcFirstName: TOvcPictureField
Left = 140
Top = 312
Width = 245
Height = 22
Cursor = crIBeam
Hint = 'Your First Name'
CaretOvr.Shape = csBlock
Controller = OvcController1
DisabledColors.BackColor = clWindow
DisabledColors.TextColor = clGrayText
Epoch = 0
ErrorColors.BackColor = clRed
ErrorColors.TextColor = clBlack
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
HighlightColors.BackColor = clHighlight
HighlightColors.TextColor = clHighlightText
MaxLength = 19
ParentFont = False
PictureMask = 'XXX'<image000.unknown>}
RangeLow = {00000000000000000000}
end
end
object BtnVideo: TBitBtn
Left = 392
Top = 416
Width = 120
Height = 30
Hint = 'Play a video describing the disclaimer'
Caption = '&Video'
Default = True
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = VideoOnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
033333FFFF77777773F330000077777770333777773FFFFFF733077777000000
03337F3F3F777777733F0797A770003333007F737337773F3377077777778803
30807F333333337FF73707888887880007707F3FFFF333777F37070000878807
07807F777733337F7F3707888887880808807F333333337F7F37077777778800
08807F333FFF337773F7088800088803308073FF777FFF733737300008000033
33003777737777333377333080333333333333F7373333333333300803333333
33333773733333333333088033333333333373F7F33333333333308033333333
3333373733333333333333033333333333333373333333333333}
NumGlyphs = 2
end
object OvcController1: TOvcController
BtnCancel = BtnCancel
EntryCommands.TableList = (
'Default'
True
()
'WordStar'
False
()
'Grid'
False
())
Left = 606
Top = 426
end
end